home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 August / macformat-027.iso / mac / Shareware City / Science / math-pad-235 / MP235 folder / Examples / incl / solver < prev    next >
Encoding:
Text File  |  1994-05-23  |  177 b   |  7 lines  |  [TEXT/MPad]
  1. -- general equation solver
  2. -- solution of a system of equations by Cramers rule
  3.  
  4. cram(A,B,k)[i,j] = A[i,j] when j≠k, B[i] dim[count(B)]
  5.  
  6. solve(A,B)[j] = det(cram(A,B,j))/det(A)
  7.